home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1995 #5 & #6
/
Amiga Plus CD - 1995 - No. 5 and 6.iso
/
pd
/
daten
/
db
/
examples
/
arexxdemos
/
expand.db
< prev
next >
Wrap
Text File
|
1994-09-02
|
241b
|
10 lines
/* Rexxprogram for db that expands some shortcuts */
Options Results
GETFIELD
select
when result = '1' then PUTFIELD 'First'
when result = '2' then PUTFIELD 'Second'
when result = '3' then PUTFIELD 'Third'
otherwise PUTFIELD result
end